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File SYSEQU.TEXT - Macintosh system equates file. 
MACWORES copy 


WRITTEN BY: Hud Tribble é-May-81 


Al) 


system routines include this equate file. 


MODIFICATION HISTORY: 


Integrate Lisagrat ce 
Configured for Alpha release {one heap! =o 
Moved Lisagraf variables up to allow more room -- 
Added system base date & time variables =< 
Allowed 20 bytes for system parameter ram area -- 
Added ptr for SYSOQUTFIB,SYSINFIB,SYSREFNUM (macpasl ib} 
Added SCC hardware addresses; removed 6551 stuff; 
pulled MBSTATE and MBTICKS from kbd driver vars -- 
added SCC write reg 3 giobals; clock-keyboard 
synchronization flags ..., == 
got rid of VBL queue element “made” word s 
changed EYREPCOUNT tc KEYREPTINE: added 

procedural interface variables for key mapping  -- 
updated for SiZ-dots _ 
changed VIA addresses for timing problem aS 
changed IWM addresses for better margin ot 
updated to 364 current version (0.50) = 
added FSinitibg for Filleri isysinit, debug} ae 
added JagData field for twiggy driver cig 
added Orvinstalled field for twiggy driver; 

changed WarmCold te TwiggyVars -- 
removed [rvinstalied field; removed FIEB pointers, 

and changed start of system heap; changed loader 

variable area oF 
added a compare string jump vector oad 
changed driver definitons, etc. ae 
added VIA equates oe 
added new i/o param b1k equates for new fs == 
added storage manager error codes a 
add disk cal switch error code an 
added keyboard task vector in #124 (KybdTask); 

broke error codes out into SysErr.Text 

added LoadTrap jiomem var a 
put dispatch table where macsbug globals used 

to be and moved down toolbox vars. ae 
Added DSdlertTab pointer on 
Added Bootirive field a 
Added PollStack, PoliProc, OskErr, OskRtndde a 
Added SonyVars ,PWMBufé -- 
Changed screen, FWM address for S1ZK proto a 
Added Resource det ie 
Added PWAValue as 
Added Heap check hooks oo 
Changed SCC addresses (hich bits on) aa 
Added DOFSID, 

Stretched KeyFadMan to 8 bytes = 
Added Mask constant, changed Heap check hooks = 
Added equates for MinStack, DefltStack for memory 

manager; moved UnitEntries equate to StartInit; 

added UnitNtryCnt lomem var instead. =e 
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Added “NoQueue" bit definition -- AJH 23 Jun 63 
Added “CuriOTrap" (replacing “Fillera" } -- AJH 26 Jun &3 
Added “forTwigay" conditional assembly switch -- @JH 27 Jun 83 


Cleaned up: changed unused vars to Fillers equates; 
changed ARdCmd AWrCnd ACL  Cmd ,AStsCmd to match 


trap numbers . .. -- LAE i5 Jul 83 
Added mmInOk for memory manager checking. ~~ LAK 24 Jul 83 
Added mmlefFlags for memory manager zone init. -- LAK Gi Jul 83 
Added DskVerify for disk driver verify/read flag 

in place of [skDump -- LAK 0&4 Aug 83 
Removed DNeedsStorage equate (no longer used) ~- LAR 08 Aug 83 
Added Loader global definitions, no more SPBot -- AJH il Aug 53 
Added IWM lomem variable ... -- LAR 15 Aug 83 
Added EvtButfnt, JCrsrTask, moved FinderName -- LAK 17 Aug 83 
Moved JUrsrTask to GratEqu. -- LAR iB Aug 33 
Added scrap vars to $960. -- SC 18 Aug 83 
Added StklowFt var for useful measurements. -- LAK 19 Aug 83 
Added [ioubleTime and CaretTime -- 5C 19 Aug 83 
Added SPClikCaret to parameter ram ~~ §C 19 Aug 89 
Folded SPKbd stuf? in parameter ram -- §C 19 Aug 83 
Corrected ROM size counts (RomBSize, RomW5ize) -- AJH 22 Aug 93 
Added keyClick bit in parameter ram ~~ JH 11 Sep 6&3 
Added GrowZone handle/pointer warnings -- &C 12 Sep a3 
Added Resource Manager equates -- ELH 22 Sep 83 
Added 14 bytes of printing globals -- AJH 3G Sep 83 
Added desk ornament message equates,changed events AJH 08 Oct 83 
Added UG0rvSize -~ LAR O2 Noy &3 
Added equates for JGNEFilter, ScrDmpEnb, ScrllmpType LAK 09 Nov 83 
fidded ScreenRow -- AJH/WOA 10 Nov 33 


Added equates for [DSAlertRect, [50rawFroc, 
EjectNotity, CorekditVars,  GDExist, 


Pe err eT ar mere r mer errr mer me Teer wee TMT MT MT Me me rn MR Se eM Yet eT ee Ed leh Malad 


WWExist and J$hell ~~ LAK ié Nov §3 

Added equate for AlarmState ~~ LAR 22 Nov 93 
Added equate for Init@pplione notity proc -- LAK 06 Dec 83 
Added equates for screen vertical, horiz res -- Lae if Dec 83 
Added NeedsGoodbye -- AdgH 03 Jan 54 
Added SysVersion ~~ AJH 06 Jan 84 
Added [SWndUpdate, SEviEnb flags -- LAR ii Jan 54 
Added FontFlag for font manager bug fix ~~ AJH 12 Jan 64 

: Modified for MacWorks -- JWP 1989/1954 

H Added TeraFroc routine pointer ~~ EWE 12 Jun 64 

: Added equates for hard disk driver ~- REO 26 Jun 64 

; Added HiiskStart routine pointer -~- RDC 28 Jun 64 

; Added notes about low-mem MacWorks globals ~~ EWE iz Aug 54 

: RomStart = #80000, DispatchTab = RomStart+$11000-— twe 13 Sep 64 

i 

i 

5 

H System Low Memory Layout 

3 

H CO00-GOFF Exception Vectors defined by the hardware 

H 0100-0340 System Communications Area 

4 OO40-035FF File System globais (i72 bytes used) 

; 400-0 7FF system support globals for Lisa 2 

} O8O0-O8FF Mouse/Cursor low-memory globals 

H O900-097F more os stuff 

H O980-GAFF toolbox variables 

; OBQO-RXRR Start of system heap 

4 

: Some other important system data structures are allocated on the heap 
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we vane 


; Conditional assembly switch to select Twiggy or Sony 

forTwig »ERU i 

; conditional assembly switch to select ROM code for Macintosh or Lisa or Yacc 
onMac »EBU i 


onLisa  .EQU 0 
onvacc =. EGU i 


E net se wt tt ae me ee ar HES eh te em Nt Sn ti et et es te 


; System Constants 


Hardware trap routine numbers 


eo oor ay 


IF onlisa 

_SetNMI Key EDU ilé 
_BetTogg] ekey -EGU lé2 
_KeyRoutine sEQU ila 
_betKeyRout ine »ESU 126 
_VBLRoutine »EGU ie 
_betVBLRout ine .EQU 174 
_KeyisTown »EGU we 

_Keynoard 2EQU a6 

_Beep LOU a0 

JbetVol ume wERU 44 

_Neise sEGL 46 

Silence LRU 45 

_limeStamp 2EGU 88 

_betTimeStamp EGU 90 

_PowerDiown »EQU a6 

_RampContrast »EGU ae 

»ENDC 


; Interrupt disable masks 


IF anMac 

VIAIntMask .EGU $0100 } no interrupts from VIA 
SCC intMask EGU $0300 }ono interrupts from SCC 
»ENDE 

lF onYacc 

VIAInthask EGU $0300 ; m0 interrupts from ¥IA 
SCC intMask »EEU $0500 ; no interrupts from SCC 
»ENDC 


} Physical Device Equates 


ilF onfac 

; mote ~- all screen and sound addresses are for the 3iZk Mac, 
: which will aiso work for the i28K machine since the address 
} Space wraps 


ScreenLow «EGU S000 7A 70 : top of screen screen address 
SoundLow EU $0007FT00 3; low sound butter address 
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PuMButfer 
SndbufWLen 
fivi yRAN 

Ovi yScreen 


ROMStart 
ROMWSize 
ROMBSize 
MemLSize 
MemWSize 


- MemBSize 


LineLen 
sENTC 


wlF onYace 


Romi hWord 
ScreenLow 
ScrnLSize 
SernLong 
ScreenOft 
LineLen 
MacIconLoc 
FaceLoc 
TconLoc 
OverLoc 
YaccMidbift 
SoundLow 
PUNBut fer 
SndButWlen 
Ovi yRAM 
Ovi yScreen 
LoadBase 


STKbassL 
STKbaseH 
StackBase 
ROMsict 
RONStart 
ROMUSize 
ROMBSize 
MemLSize 
NembSize 
MembSize 


Vidlmakeg 
Sndiimakeg 
NemingBase 
VidMapBase 
User Offset 
Super Ottset 
VectorSz 


»ENDC 


; Device Equates 


IF onLisa 


ScreenLow 
Miatffset 
LisaMidhiff 
SoundLow 
FPUNBut fear 


+EQU 
«EDU 
+E 
ERY 


+EGU 
«EGU 
»EDU 
EGU 
«EGU 
»EOU 
»EOU 


+Equ 
1EGU 
EGU 
+EBU 
«EGU 
»EQU 
.ERU 
2E GU 
»EGU 
EGU 
sEDU 
rE GU 
»ERU 
»EGU 
»EBU 
+EBU 
EU 


EBL 
+EBU 
EG 
sE8U 
»ERU 
«EGU 
-ERU 
+ERU 
»EQU 
-ERU 


»EQU 
+EGU 
EGU 
-EQU 
»ERU 
:EU 


EGU 


for 


EGU 
sERU 
+EBU 
rE BU 
rERU 


Thu, Mar 


$000 7F 001 
£0172 

$00600000 
$006 78700 


$00400000 
FOOOOB000 
£00010000 
£00010000 
£O0020000 
£40 


F0009 
S000R4000 
F00002500 
£00002500 
$9600 

$50 


ScreenLowt<LineLen#14124+38 
MacIconLoct<LineLen# 7341 


Mac iconLoc 


TconLoct<LineLen#1S2+1 


#00470040 
S00080600 
SQ0DCF FFE 
FORK) 

$00 700000 
0074000 
$1000 


ESFFE 
$0008 
SQ00B3FFE 
$0080 
S00090000 
$000 10000 
FO0020000 
$00040000 
f00080000 


SQQEFFFFE 
SQQEEFFFE 


£O09FEB00 | 


S00ADFEQ0 
#6 

$1000 

$40) 


Lisa 


#660 
#GFCA 
$00210068 
S000 7F 000 
£000 7F 001 


16, 


i978? = «11:02 PM 


sae en ee 


oe ee We we ee 


Or eer ry 


rT a te 


Te ee eee ee Te CeCe ry 


ore ee ee te Tee ery 


ree ae ee? aor) 


FWM bytes are low bytes 

sound/disk buffer word length 

low RAM address when overlay is on 
top of screen with overlay 


starting address of ROM code 

32768 words in present ROM 

65534 bytes in present ROM 

memory contains 32k jong words 

44h words 

and 128K bytes 

horizontal screen line has 64 bytes 
of .if onMac 


current high word address of rom image 
top of screen screen address 

there are 9680 longs for i plane 
number of longs for entire screen 
offset from one frame buffer to next 
horizontal screen line has 80 bytes 
y Mac Icon Location 

; Face Overlay Location 

3 Disk Icon Location 

, 7?) & CK! Overlay Location 
delta point between lisa/mac screen 
low sound buffer address 

FHM values are low 10 bits 

sound buffer word length 

low RAM address when overlay is on 
top of screen with overlay with MMU 
where ROM image is loaded 


Low word of Stack -- no overlay 
High word of Stack -~ no overlay 
Start Stack at base of scrren 
High word of bank © ROM address 
starting address of RUM code 
32768 words in present ROM 

65536 bytes in present ROM 
memory contains 128k long words 
2n6k words 

and 12K bytes 


bits ié-i for start of video buffer 
bits 16-1 for start of sound buffer 
base of 2E x i6 WAU registers 

base of 256 «x 16 video map 

offset to user mode registers 

offset to supervisor mode registers 
$100 / 4 bytes per vector 


of .if. onYacc 


ptr to address of top of Lisa screen 
offset to middie of Lisa screen 
deita point between lisa/mac screen 
low sound buffer address 

PUM bytes are low bytes 
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SndButWLen »EGU $0172 ; sound/disk buffer word Jangth 

dvi yRAM »EQU $00600000 ; low RAM address when overlay is on 
Ovl yacreen EOL $0067A700 ; top of screen with overlay 

ROMStart »EGU $00400000 ; Starting address of ROM code 
ROMWSize -EOU 00008000 ; 32768 words in present ROM 

RONBSize -EQU 200010000 3 63594 bytes in present ROM 

MenLSize «EGU $00020000 ; memory contains 129K long words 
MemWSize »EQU #00040000 y 204K words 
MembSize EGU $00080000 jy and 312K bytes 

LineLen »EQU fA } horizontal screen line has 90 bytes 
ScrnLoize »EGU #1FFE ; there are SE-Z longs in the screen 
sENDC ; of .if onLisa 

IF onMac 


; VIA (6522) 
} Absolute Addresses 


VBase +EGU FEFEIFE ; base address 

AVBute -EQU VBase ; buffer B 

AVEutA -ERU SEFFFFE ; buffer & 

AVButH «EGU AVBufB ; buffer with mouse button bit 
AVIFR +EBU SEFFEFE } interrupt flag register 

AVIER »EQU SEFFOFE ; interrupt enable register 


; Offsets 


VButé EU ai2e0 ; BUFFER & 
VBut AH EGU S1Z#i ; buffer a (with handshake} [€ Dont use! J 
VDIRE EGU w12#2 ; DIRECTION & 

VOTRA -ERU a1243 ; DIRECTION A 

VTi EU a12e4 ; TIMER 1 COUNTER (L.0.) 

VTICH «EGU s1Ze5 ; timer 1 counter (high order) 

VTL +EGU a1Z#6 ; TIMER 1 LATCH (L.0.) 

VTILH »EGU aie? y timer i latch (high order) 

VT2C EU a12a8 j TIMER 2 LATCH (L.0,) 

VTZCH »EGU Size i timer 2 counter (high order) 

VOR EGU al2#10 ; SHIFT REGISTER 

VACK EGU a12#11 ; AUX. CONTROL REG. 

VPCR EGU aiZ#1z ; PERIPH. CONTROL REG. 

VIFR »EBU 12815 ; INT, FLAG REG. , 

VIER sEGU aizel4 ; INT. ENABLE REG. 

Vbuta -ERU ai2k15 ; BUFFER A 

VBut Gi EGU VButA ; disk head select buffer 


; Buffer A: 


VAgut EGU SUF ; VButA output bits 

VAInit .EBU #78 ; VBufA initial values med. volume 
VSound EG $07 ; sound volume bits 

VindFge »EGU 3 ; select sound page 2 if @ 
VOver lay »EGU 4 ; overlay bit (overlay when 1) 
VHeadSel EGU 8 

VPagez EGU &é ; sGlect video page 2 if 0 
VeCCWrReg -EQU 7 ; SCC write/request line 

: Buffer Bs 

VEGut .EGU $87 ; VEutB output bits 

VETnit EU S07 ; VBufB initial values 


oe 


RTCTata .EGU i) 
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RICCI k EGU i 

RICEnb .EGU 2 ; anabled when @ 

Vow EGU 3 ; mouse switch (0 when down) 
VXe »EGU 4 ; mouse X lavel 

Viz ~ EGU a ; mouse Y level 

VH4 -EQU é ; horizontal sync 

VEndEnb «EDU 7 ; /sound enable (reset when 1) 
«ENDO 

IF onYace 

; VIA (6522) 

; Absolute Addresses 

VBase .EQU $EDFF 40 ; base address of MAC compatible VIA 
MiscViabase »EGU SELFF 20 ; base address of miscellaneuos VIA 
; Offsets 

VButB «EGU 24) ; BUFFER & , 
VBut aH «EGU 241 ; buffer a (with handshake} [€ Dont use! Jj 
VDIRE »EBU 242 ; DIRECTION # 

YVDIRA »EBU 249 ; DIRECTION A 

¥TAC EGU a4 ; TIMER 1 COUNTER (L.G.) 

VTICH »EGU 2¥a ; timer i counter (high order) 
VTL «EGU 246 ; TIMER i LATCH {L.0.) 

VTILH EGU Zk? : timar i latch (high order) 
¥T2C AGU BB ; TIMER 2 LATCH (L.0.) 

VTECH sERU eey } timer 2 counter (thigh order) 
VSR EGU 2e10 ; SHIFT REGISTER 

VACR »AGU Zeli ; AUX. CONTROL REG. 

VPCR EDU 2412 ; PERIPH. CONTROL REG. 

VIFR EDU 2813 ; INT. FLAG REG. 

VIER +EGU 2#i4 ; INT. ENABLE REG. 

VButA EU 2215 ; BUFFER A 

AVBut BE »EGU VEase ; buffer B 

AVEuTA -ERU VBasetVEuta ; buffer & 

AVEut i »EGU VEase ; butfer with mouse butten bit 
AVIFR EGU Yiaset+VIFR ; interrupt flag register 
AVIER »EGU VBasetVIER } interrupt enable register 
VBuf i »EGU VButA :; disk head select buffer 
MVButk »EGU MiscViabase ; buifer B 

MVButa sEGU NiscViabasetVouta ; buffer A 

MVIFR :EGU MiscViaBase+VIFR ; interrupt flag register 
MVIER sEGU MiseViabase+VIER ; interrupt enable register 


: Buffer A: 
i; MAC compatible VIA Fort & 


YACut EG OGOLIGLI1E ; S37-VeutA output bits 

VAInit »EGb OOGLG0011B } F20-VButA initial values med. volume 
VSound »EGU OUOOOLLIE i; #07-sound volume bits igut) 
VBI ank 2B a ; Vertical blank true when = G (in) 
VOverl ay «EGU 4 fooverlay bit foverlay when 1) (out) 
VHeadSe! »EGU i] ; Sony head select {sided = 1) {out) 
VEvenScan «EGU é ; Even scan line true when = 0 Cin) 
VSCCUrReg »EOU 7 ; SCC write/request line {in} 


i Buffer 8: 
; MAC compatible VIA Port B 
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VBOut sEQU iOQQ0111B ; #87-VButB output bits 

VEinit »EGU HOO001 LLB : $07-VButB initial values 

RTCBata »EGU G ; e/w parameter data {bi} 
RICCI »EQU 1 7 used to latch data into chip (out) 
RICEnb »EQU z i; enabled when 0 {out} 
VSW 2EGU 3 ; mouse switch {(@ when down) tind 
VRE sEGU 4 ; mouse x level {ind 
VY2 »EGU 3 ; mouse Y level dind 
VH4 »EGU é ; horizontal syne (in) 
VEndenb wEGU 7 ; fsound enable (reset when 1) (out) 


: Micsellansous VIA Fort A 


M¥VAQut , .EGU OOOO01L 008 y FO4-MVButA output bits 

MVATnit EGU HOO001 008 3 #04-Lisable TV geniock 

MVPr intr EGU 0 ; Priam Interrupt true when = 10 (in) 
BVPrPar—rr «EGU i 7; Priam Parity Error true when = i (in) 
MVTVEna EGU 2 a Ext TV Enable true when = 9 = (out) 
MVT¥Conn EGU |g 3 Ext TV connected when = 0 (in) 
MVIMId «EGU 4 ; IM Bus (bi) 
MVINCIE EGU rs] ; IM Bus (bil 
MVIMRst »EQU é ; IM Bus (bi) 
MVIND »EQU 7 ; IM Bus ibid 


3; Hicsellaneous VIA Port 8 


MVBOut .EGU iOLiL1OOB ; FEC-MVEufE output bits 

MVBInit rE QU O00 100008 3; #10- VMap lookup & output enable 
NVHSFPRusy »EGU 0 ; HighSpeed Parallel Port Busy (in) 
MVHSPFFarErr -EGU i ; HOFF Parity Err (in) 
MVHSPPReset -EGU 2 ; HSFF Reset tout) 
MVHSPFCnd sEGU 3 ; HSPP Command fout? 
MVVMapac »EGU 4 ; Videodap O = R/W, l= Lookup tout) 
MVVMapGe EGU a ; VidMap Output Ena, @ = enable (out) 
RVMTarin .EGU 4 ; timer in 

MVMTarGut »ERU 7 ¢; timer out 

VMapOe_Hih «EGU $20 ; byte mask for ORI & ANDI of output enable 
VMapAc Hih »EDU #10 } S$amé for access control /lookup 

»ENDC 

i mote: CAL = Y5ync true if 0 fin) 

; CaZ = 1 sec clock {in} 

1 CEL = keyooard clock tin} 

; CBL = keyboard data ibi} 


2 
8 
3 
3 


; SCC SERTAL CHIP ADDRESSES 


IF onYace 

SCCRRase EGU S0EFFFS ; SCC base read address 

SCCWBase 2G S0DEFFF9 ; SCO base write address 

SCCWrite »EGU #1 } general offset for write from read 
* ENDC , 

iF onMiac 

SCCRBase »ERU S9FFFFS ; SCC base read address 

SCCWRase »EEU $BFFFFS ; SCC base write address 

SCCHrite »EGU $200001 ; general offset for write from read 
»ENDC 


elF onLisa 
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SCCRBase »EGU $F CUS ; SCC base read address 

SCCWEase EU $F C0201 ; SCC base write address (same) 
SCCWrite EGU #0 ; general offset for write from read 
.ENDC 

5CChata sEGU 4 + general offset for data from control 
Alata EGU é ; offset for A channel data 

ACtI EGU 2 ; offset for A channel control 

BData »EQU 4 ; offset for B channel data 

Bot! ERU ui ; offset for 8 channel control 

Rx BF »EGU o ; SCC receive buffer full 

TxBE »EQU z ; SCC transmit butter empty 


. 


8 ereertetnensenseneveneecereeneennennenennennnntinnnenenaunnansesimendntennnmaatnetnnnnensnnnennmennnrnnannretnnsimenentniiteitnti nee 


; 
; DISK ADDRESS 


IF onMac 

UBase »EGU S0FELFF j disk address base 

DP ROL EGU Ubase ; phase O low 

DPHOH EGU #0FESFF ; phase @ high 

DMtr Ott »EGU $01FF AIFF ; IWM Motor off 

DMteOn »EGU $0FFSFF ; IWM Motor on 

DiskGéel »EQU FUFFOFF y shift register 

DiskGéH »EGU $0FF RFF 

DiskQ7l »EDU S0FF OFF 

bisk@7H -EGU S0FFFFF 

PROL -EGU nized ; disk address offsets from base 
PHOH .ERU Sifel 

PhiL EGU S128? 

Fhik EGU a1243 

Phe EGU silZe4 

Ph2H EGU S1Z85 

Pha »EOU SiZeé 

FhSH .EOU 51247 

NtrOt¢ «EGU 51288 

MtrGn +EGU ale? 

Intlrive EGU wietid ; @nable internal drive address 
ExtDrive »EEU aiZeil ; enable external drive address . 
BL »EGU aiZe12 

GoH »EQU S1Z#i3 

ie EGU Size#i4 

7H »EQU 512415 

-ENDIC 3; of .IF onlac 

IF onvacc 

[Base »EGU S0UFFEL | ; disk address base 

FROL 2E RU 5G ; disk address offsets from base 
POH .EGU 2#i 

Phi »EGU Zhe 

PHL EDU 243 

PHeL .ESU 2H 

PhZH .EGU a5 

Pak -EQU 26 

Ph3H »EQU Zk? 


Mtr lft EGU 245 
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ftrGn 
IntDrive 
ExtIirive 
dl 

DSH 

aL 

O7H 


DPhGL 
DFAGH 
DMtrdsF 
DAtron 
CiskOSe 
DiskGék 
Disk@7e 
Diski7H 


FWMDataReg 
sENDC 


IF onLisa 
SonyStart 
Intirive 
Extlrive 
Sonylone 

sENDC 


2/22/85 fel 


iF onfacc 
FriamBase 


Priamif 
FPrianCnd 
PriamSts 


PriamPa 
Priam 
PriamP2 
PriamF3 
Frianr4 
PrianPS 
wENBC 


nem cate cet 


BusEreVet 
LINELOIG 
LINE1111i 
AUTGINTI 
AUTOINTS 
AUTOINTS 
AUTOINTS 
AUTOINTS 
AUTOINTS 
AUTOINT? 


»EGU 
«EGU 
»EGU 
»EBU 
LRU 
»EGU 
«ERU 


»EQU 
ERY 
EGU 
»EGU 
»EQU 
+EQU 
EGU 
“EGU 


EGU 


EGU 
-EQU 
»EQU 
EGU 


PRIAM PORT COMMAND 


“EGU 


»EBU 
EGU 
ER 


+ERU 
EGU 
+ERU 
EGU 
»EGU 
EGU 


Interrupt Auto-vector 


EG 
EGU 
sEQU 
+EGU 
EGU 
EGU 
+ERU 
sERU 
sEGU 
EGU 


Thu, Mar 


2e9 

210 
Z#il 
212 
2#i3 
2el4 
2#15 


[Base 
[Base+PhoH 
[iBase+MtrOtt 
DBasetHtrOn 
[Base+Qél 
DBasetilah 
DBaset@7L 
[igaseti7H 


SDCFFFE 


$648 
SFCCO0G 
$FCO000 
F4RE 


SB00001 


PriamBaset#o0 
PriamBaset#4t) 
PriamBaset+£20 


FriamBaset#44 
Friambasettoa 
Priambaset£66 
PriamBaset+#6A 
Frianbaset+$éC 
PriamBaset+$4E 


and Exception 


#08 
$28 
#20 
$44 
$65 
#60 
#70 
$74 
$78 
S70 


16, 


AND STATUS REGISTERS 


198? 


sa em eee ee ee ee rey 


oe mn me ee 


ory 


Aan ee 


ee cae 


Ce eee ae ae) eT ee ery 
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drive address 
drive address 


enabie internal 
enable external 


phase © low 
phase © high 
IWM Motor off 
IWM Motor on 
shift register 


PUM value (0..7 
of .IF onYacc 


= low, §..12 = high) 


Sony driver antry point 

base address of internal drive 
base address of external drive 
Byte, Sony comand complete 

of .IF onLisa 


Base addr for priam regs 


Byte used for data 1/0 
Set R2-R7, then write cmd 
Status byte, read R2-R7 
Regs: cad params, results 
Low order byte 


fefinitions 


Bus Error Handler 
1610 emulator trap 
lili emulator trap 


isystem routines} 
(reserved) 


level i auto-vector 
level 2 auto-vector 
level 3 auto-vector 
level 4 auto-vector 
level 5 auto-vector 
level 6 auto-vector 
level 7 auto-vector 
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Mouse Equates 


(From Rick’s drivers} 


Thu, Mar 


16, 


198911302 PM 


——seseneetenstientteenetuannanie austen unteneeentnmerenenereneesntneanagnanentannnnsennteennsennnseinstanuernateceemtnmsintrrehreen rennet 


2IF onLisa ; 

MouseXx »EGU RomStart+ROMks ize+$00EC ; location of mouse x coord <9/14 
tum? 

Mouse’ EGU RomStart+ROMbSize+$00EE ; location of mouse y coord <9/14 
twm? 

; Clock/Calender Equates {conversion from Lisa <-> Mac Time stamp format) 

Lisadffseat »EGU S5AG9AR0 ; F sec between 1/1/01 and 1/1/04 

«ENDC 


3 
; SYSCOM Equates 
j 


(System Communication 


EDU 


; SYSTEM LOCATIONS 


MonkeyLlives 
SerVRes 
ScrHRes 
ScreenRow 
fenTop 
BufFtr 
StkLowPt 
HeapEnd 
TheZone 
UTabl eBase 
MacJnp 


[skRtnAdr 
TuiggyVars 
Usk Verity 
LoadTrap 


— amindk 


DskWrli 
ApplLimit 


SonyVars 
FPuRVal ue 
Fol i Stack 
Poll Proc 
fiskErr 


SysiviMask 
SysEvtbut 
Eventiueue 
EvtButfnt 


RAndSeed 
SysVersion 
SEvtEnb 
USWndUpdate 
AlertRect 


-EQU 
EGU 
-EQU 
+ERU 
»£0U 
EU 
EGU 
EGU 
EGU 
EBL 
+EOU 


EGU 
EGU 
»ERU 
EGU 
»ESU 
-ERU 
»EQU 


»EGU 
EGU 
EGU 
-ERU 
ERY 


-EQU 
-EQU 
*EQU 
EGU 


+EBU 
EDL 
EGU 
-EQU 


#100 


#100 
#102 
$104 
#106 
£108 
$100 
#110 
#114 
£118 
Fle 
£120 


$124 
$128 
#120 
#120 
#13E 
$12F 
S100 


ApplLimit+4 
SonyVaret4 
FWMValuet2 
Pol iStack+4 
Foi lProce4 


DskErr+e 


SysEvtMask+2 


SysEvtBut+4 


EventiueuetiG 


EvtBufint+2 
RndSeed+4 


SysVersiante 


SevtEnbtl 


oe MS ee ee care can car RA ce ee 


ee Tee Ce merry 


ee wn a Ae 


we ane He con 


Area) 


start of system communication area 


monkey lives if 3= @ 

screen vertical resolution {dots/inch} 
screen horizontal reselution (dots/inch) 
rowbytes of Mac screen 

Ftr to top of memory 

Fer to bottom of code buffer 

Lowest stack as measured in VBL task 
Ptr to end of heap 

Ptr to current heap zone 

Ptr toa unit I/O table 

Fte to MACSBUG jumptable 


temp for disk drivar 

Ftr to twiggy driver locals 

used by sony driver for read/verity 

set to non-zero to trap before pom strt 
non-zero when initial mem angr cks ok 
try i-i disk writes when non-zero 


pointer to 3-1/2 disk driver vars 
currant PWM value 

SCC poll data start stack location 
proc which handles S§CC poll data 
disk routine result code 


System event mask ; 
Ftr to system event queue element buffer 
5S words, event queue header 

max number of events in Systvibut - 1 


version # of RAl-based system 
i byte: O disables SysEvent calls from GNE 
1 byte: G flags GNE to paintBehind 05 
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FontFl ag 
Filier3 


VELOueue 
Ticks 
MBTicks 
NEState 
Tocks 


KeyMap 
KeypadMap 
KeyLast 


KeyTime 
KeyRepTime 
KeyThresh 
KeyRepThresh 


Lyi iDT 
Lvi2hT 


Unithtryint 
VIA 

SCCRd 
SCCwr 

TWM 


GetFaran 


SysParan 
SPValid 
SFOdometer 
SFFortaé 
SFFortb 
SFAl arm 

SF Font 
SFikbed 


SPPrint 
SP¥aiCtl 
SPCi ikCaret 


SFMiscl 


SPMisc? 


Time 
Sootirive 


J8hell 
Filler3a 


KbdVars 
JKkybdTask 
KbdType 
Alarmitate 


Cur i0Trag 


»EGU 
»EGU 


»ERU 
+EBU 


EGU 
EGU 
EGU 
EGU 


+EGU 


Thu, Mar 


DSWidUpdateti 
FontFlagti 


Fillerd+l 
VBLOQueuet 10 
Tickst4 
MBTicks+4 
MEState+1 


MBStatet2 
KeyMapté 
KeypadMapts 


KeyLast+2 
KeyTime+4 
KeyRepTimet4 
KeyThresht2 


KeyRepthresht2 
Lvl LDT+32 


Ly] Z0T+32 
UnitWtryCnt+2 
VIAt4 
SCCRd+4 
SCCWr+4 


_ TWM+4 


GetParamt2o 
SysParam 
SFValid+i 
SPOdometer+3 
SFFortate 
SPPorth+2 
SPAl arm+4 
SFFont+2 


SPEbd+1 
SPPrintti 
SPVoICET +1 


SFC ikCaret+i 


SPHisci+l 


SysParamtZ6 
Timet4 


Timeté 
J5heli+2 


Fillerdgat2 
KodVars+4 
JkybdTask+4 
KbdTypett 


KbdTypet2 


16, 


8 sen 


et a ery 


On ee ee te we ee me See Ce eh A en One en se ne ce ee 


a9 sew 


Oe oo 


an 


1989 = 11:02 PM il 


boolean for font manager bug 
i byte of filler 

5 words, VEL queve header 
Tick count, time since boot 
tick count when mouse button 
current mouse button state 
Lisa sub-tick count 


in 1/606 increments 
last changed 


é longs, 
i long, 


a bitmap of the keyboard 
a bitmap for numeric pad-iabits 
lo byte: ASCII for last valid keycode 
hi byte: last valid keycode 
these are 0 when no key is down 


Jong tickcount when EEYLAST was rec’d 
jong tickcount when key was jiast repeated 
word containing threshold for repeat 

word containing repeat speed 

Interrupt level 1 dispatch table 
Interrupt level 2 dispatch table 


count of entries in unit table 

VIA base address (use low memory addresses) 
SCC base read address ito save code space) 
SCC base write address 

IWM base address 


Farameter blk for reading sys parameter area 


20 bytes of system parameter area 


byte 1 = validation field (#A7) 

2-4 = odometer 

a4 = SCC port A configuration 

7-2 = SCC port #8 configuration 

f-12 = alarm time 

13-14 = default font id 
1305 kbd repeat thresh in 4/é0ths(4) 

kbd repeat rates in 2/éuthe(4) 

i6 = print stuff 
i? = volume control {low 3 bits) 
18 = double time in 4/60ths(4) 


caret Glink time in 4/460ths(4) 
i9 = eanglish/metric (1), 

extra (2), 

country code (3) 
20 = parancia level (1), mouse 


acaling(i), keyflick (1), baot 
disk (1), menu flash (2), help 
level (2) 

clack time when last read (extrapolated) 

drive number of boot drive 

used by journaling shell ... 

2 bytes 

Keyboard. manager variables (4 bytes) 

keyboard VBL task hook 

high Byte holds keyboard model number 


Bitv=parity,  Bité=beeped,  Bitt=l=enabled 


trap the caused current 10 transaction 


3.19. Syqequ.Text 


fiskVars 


SdVol ume 
SdEnable 
SoundVars 


SoundPtr 
SoundBase 
SoundVeL 
SoundDCe 
Soundactive 
SoundLevel 
CurFitch 


SoundLast 
ScreenVars 
JGNEF il ter 
KeylTrans 
Keyelrans 


SysZone 
Appl Zone 
ROMBase 
RANBase 
BasicGl ob 
DSAl ertTab 
ExtStsfT 
SCCAStS 
SCCESts 
Serial Vars 
FinderName 
doubleTime 
caretTime 
ScrimpEnb 
ScrlapType 
TagData 
firvidHdr 
FWMButé 


HpChk 

Mask BC 
MaskHandle 
MaskFtr 
MinStack 
fief i tStack 
malie?F] ags 
6GZRootHnd 
GZRootPtr 
GZMoveHnd 
USUrawFroc 
EjectNotity 
lAzNotity 
endof vars 


nm en 


ae 


Thu, Mar 


Curl0Trap+2 


TiskVars+é2 
SdVolume+1 
SdEnableti 


SoundVars 
SoundFtr+4 
SoundBaset+4 
SoundVEL+16 
SoundDCe+4 
SoundActivet1 
SoundLevel+i 


CurPitcht2 
SoundVars+48 
ScreenVarsté 
JONEF il ter+4 
KeylTrans+4 


Key2Transt4 
SysZone+4 
Appl Zonet4 
ROMBaset+4 
RAMNBase+4 
BasicGlobt4 
[SAl ert Tabt+4 
ExtStsiT+16 
SCCAStS+1 
SCCEStst+i 
Serial Varstié 
FinderNametié 
doubleTimer4 
caretTimet4 
SerlimpEnbti 
ScerDmpTypeti 
Tagbatat14 
DevGHdr +10 


PUNBut 2+4 
HpChik+4 

Mask BC 
MaskBC 

Mask BC+4 
MindStack+4 
Tati tStack+4 
ambefFlagst2 
G2ZRootHndt+4 
GZRootPtr+4 
GZMoveHndt+4 
US5irawFroct4 
EjectNotify+4 
IAZNotify+4 


16, 1987 11:02 PH 


; Disk driver variables (42 bytes) 


; Global volume control (1 byte) 

; byte to enable 4 voice engine 

; Sound driver variables (really only 20 bytes) 
ipointer to 4VE sound definition table 
jbase address of sound bitMap 

yvertical retrace control element 
ypointer to sound driver DCE 

yhoolean specifying if sound is enabled 
ibyte specifying current level in buffer 
yword holding current pitch value 


yaddress past Jast sound variable 


Screen driver variables 


“8 


GetNextEvent filter proc 


pointer to procedure handling 
key translation 

pointer to procedure handling numeric 
keypad key translation 

pointer toa system heap zone 

pointer to application heap zone 

start of ROM addresses (jump table?) 

start of RAM addresses 

pointer to Basic glabals 

pointer to deep shit alerts 

SCC ext/sts secondary cispatch table 

SCC read reg @ last ext/sts rupt - A 

SCC read reg 0 last ext/sts rupt - & 

async driver variables 

16 byte name of Finder 

double click time(Set up by boot blocks) 

caret blink time 

screen dump enabled when non-zero 

FF dumps screen, FE dumps front window 

sector tag info for twiggy drivers 

queue header of drive numbers in system 

pointer to PWM buffer i tor 2 if sound 
buffer 2 i5 being used) 

Points to heap check RAM code 

Memory Manager Byte Count Hask 

Memory Manager Handie Mask 

Memory Manager Pointer Mask 

min stack size (1024) used in Initappidone 

default size of stack (for growing Azone) 

default zone flags 

root handle for GrowZone 

root pointer for GrowZone 

moving handle for GrowZone 

alternate deepshit box draw proc 

proc to call and notify upon ejects 

proc to call and notify upon world swaps 

end of final defined vars 


keyboard 


ee Te Te eT Te ee ee Pe Te ee Te ee Te Te rT ah i i Phe rie eT ier) 


wn ee ne 


The File System local variables are kept from #340 to #3FF 


3.19. Syqequ.Text 


* 
3 


FileVars »EGU 
[SAlertRect .EQU 


MacWorks#/LisaBug 


globals 


Thu, Mar 16, 1999 


£400-$7FF 


{1:02 PH 


; 
; rectangle for disk-switch alert 


The following globals are declared elsewhere in sysequ/sonyutil/drivers 


: SYSUTIL name 


bs 

; 

: Sonylone »EGU 
: EGU 
H »EQU 
; UskBase »EGU 
: -EQU 
} SonyStart EGU 
; ScreenLow »EDU 
i -EQU 
A »EGU 
: Diskext .CGU 
; DiskRsit EGU 
; WheresSony EGU 
; EGU 
i »EGU 
i EDL 
iF onLisa 
MacWorks rERU 
RegSave eb GU 
SavePl »EGU 
DiskExt sEQU 
DiskRslt sEGU 
wheresSony EGU 
Tondt Mem 2EG0 
JermProc | »EGU 
HDiskStart EGU 
Ends «EGU 
zENDC 


rT eT et ee. ry 


a Te oer) 


iiF onLisa 
fispatchTab EGE 
ZENDC 

wiF onMac 
TiispatchTab EDU 
»ENDC 

IF onYacc 


fispatchTab EGU 


from #410900 to approx. 


SONYUTIL 


#4AF TWEDONE 
S40F TWESTAT 
#410 

$620 

$624 XDRIVE 
$648 DRVRENTRY 
$660 

$670 

$674 

#744 TWODONE 
#745 TWGSTAZ 
$746 EXTBASE 
$799 CARDSID 
#7A4 

F780 


$700 
MacWorks 
RegSavet64 
SavePC+4 
DiskExt+i 
DiskRs]t+i 
WheresSany+4 
TopOtheat4 
TermProct4 
HDiskStart+4 


System Core Routine Uispatch Table resides from #xxxx-Fyyyy. 
can intercept any core routine by changing these pointers. 


name URIVERS name 


(byte) 
(byte) 
Al tSernAddr (ptr) 
{ptr) 
iptr) 


ScrnAddr (ptr) 

Al tScrnPhys (ptr) 

SernPhys iptr) 
{byte} 
(byte) 


(3 longs?) 
MemoryBase (ptr) 
Keybdilueue (32 bytes) 


send of MacWorks globals E #7FF 
iplace deepshit will stuff registers 
gsemaphore for external disk drive 
ieerop code for external disk drive 
qaddress of axternal Sony card 

ytop of memory for Mac environment 
qypcinter ta termination routine 
pointer to start of hard disk driver 
ilast MW var 


For Macsbug running on the Lisa, the high memory globais 
$4)0800 are used for the debugger. The 
debug stack grows down from #411000.(7 twm 9/13) 


The user 


RomStart+ROMesize+$1000 


#400 


FB3000 


; below the start of the screen 


ee eT ee ee ee ae Ee Te OS 
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RegSave »EGU $RZFEG ; high mem place to save registers 
SaveFC EGU RegSavetd4 yplace deepshit will stuff registers 
ENC 


eernereenennnnenneennntsstasinesinatnioniemstsnstenneusumepneaanaraninrenitnnnientnateertnrrrnttantnnteetnnnessititiiatesntenentntithtAttRt tht TT t YRC STS tAet centre 


The cursor jump table interface and cursor state variables start at #800 
For their definitions, see the file "GRAFEQU.TEXT". Starting at #8F0 and 
working down we have addresses of OS routines which are not accessed 
through traps. 


8 wn an cme en ee 


nese ent inaminannaranmennateaiaianetenritanttemnnetntetetttitttttieRni tnt NCLCA ALCATEL NNN E TCT TCC TCR, 


WHEY ist «EGU F0FZ ; zero when window manager is initialized 
ODEN ist EGU #OF3 ; zero when quickdraw is initialized 
JFetch EGU $F 4 : fetch a byte routine for 1/0 drivers 
J5tash »EDU $0F 3 ; stash a byte routine for 1/0 drivers 
J10Done »EQU $8FC ; i0Done entry location 


LoadVars sEQU $900 loader variables 


ory 


; low-memory Loader globals 


refNum of current resFile 


CurApRet ium »EGU LoadVars ‘ 

LaunchF lag »EGU CurApRetNumt+2 ; boolean to distinguish Jaunch/chain 
Currentas EGU LaunchFlagt2 y current value of Ag 

CurStack Base »EGU CurrentAa+4 s current stack base 

LoadFiller .EGU CurStackBaset4 ; empty for now... 

CurAphame 2EGU LoadFiller+4 : place to save name of application 
SaveSeghandle sEGU CurApName+d2 ; place to save seg 0 handie 
CurJTOftset »EEU SaveSegHand! et+4 ; word for current jump table offset 
CurPageliption «EGU Cur JTOffsett2 : current page 2 configuration word 
LoaderF Sl ock +E GU CurFageOptiont4 ; param block for internal ExitToShell 
LastL@l obai -ERU LoaderPRlock+10 : address past last loader global 
PrintVars EGU LastL6lobai ; 16 bytes for Owen 

LastPGi obal .EGU PrintVars+16 ; address of last global 

CorefditVars »EGU LastPGl obal : 12 bytes for core adit 


; Low memory vars for the scrap manager 


scrapVars »EGU $960 

scrapinta »EGU scrapVars : Scrap info 

scrapHandle  .EGU scrap intot4 ; handle to memory scrap 
scrapCount .EGU scrapHandieat4 ; validation byte 

scrapState EGU gcrapCountt2 : state of scrap defined below 
scrapNane EGU scrapStatetz } pointer to scrap name 
scraplag »EGU scrapNamet4 : actual name goes here 
scrapend zEGU scraplagt1é ; and of scrap vars 

Tool Vars »£GU $980 ; toolbox variables 


eoneeeenereneeseaneeseneesimsatmnnintsshnsnsmuanteinsrecrnnererenesantmnnntnetiimittitnttinmneent rent ANC RLLCL LTA ACN CNN CTCL Ae 


; 
i 
; Finally, we have the start of the heap. Note that some important system 
; tables are kept on the heap. 


wry 


ccaasanssemneesntneneetnemennsasnanneemtanenteanatainaimentttnninnstntitisninnaetNntattnt Nett CNEL CLCCTCE LEC TELE NECA RICA CALC ANNA CACC ALLL CTT, 


HeapStart sEGL = S0R00 ; start of the heap 
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System Data Structures 


nm ce cae 


Lock EGU 7 ; lock bit in a master pointer 
Furge EGU & 3 bit for purgeable/unpurgeable 
Resource .ERU a j bit to flag a resource handle 


; Queue Header [Definition 


GHeadSize .EBU id ; A queue header is 10 bytes Jong 
OF lags »EQU 9) } misc. flags 

GHead EGU 2 ; d2-bit ptr to first element 
OTail »EGU & : Se-bit pir to last element 
finUse .EQU 7 { queve-in-use fiag bit 


; Hueue Element Type Definitions 


VType »EGU i ; VBL queue element is type i 
lDGT ype »EGU 2 ; [/0 queue elemant is type 2 
TimerType .EQU 3 ; timer queue element is type 3 
Evi ype +EGU 4 ; event queue element is type 4 
FaaType »EBU 2 ; File System VCR element 


; General Purpose Queue Element Definition 


Glink EGU ) i link to next gueve element 
OType 2EGU 4 i} queue element type 


; Drive queue element offsets 


D@ETinth sEGU 12 j drive queue element length including hdr 
ichange to 14 except for sony driver! 

DeGrive .EGU ; drive number 

DORet Num 2EGU 8 ; driver refnum 

DFSID 2G id } file system handling this drive 
DRGrvSize sEBU 12 i; quaber of blocks this drive 


Unit Table Uetimition -- there is one entry in the unit table for each 


of one 32-bit memory handle: the first entry corresponds to RefNum -1, the 
last to RefNum -32. The Unit Table is made during sysinit time and is 
allocated from permanent system memory; lo-memory location UTableBase points 
to the table. UnitNtry€nt is initialized to UnitEntries by Startinit: all 
other code should use this low mem variable. 


Device Control Entry Definition: for each Unit Table Entry, one driver may be 


ven oe 


unit table will be the handle of a Device Control Entry. 


gach entry is 40 bytes jong 


bCtlEntreysize »EGL 4G 4 

DCt Driver +EGU 0 ; offset of pointer to driver 

OCtiFlags .EGU 4 ; offset of flags word 

DCt) Queue »EGU é ; offset of queue header 

DCE | GHead "J ERU g ; offset of queue first-element pointer 
[Ct GTail »EGU i? : offset of queue last-element pointer 
DCtiPasition EGU 16 i offset of longword position pointer 


jagical driver. The number of entries is hardwired to 16. Each entry consists 


installed. If the driver is instailed, the corresponding memory handle in the 


{5 
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OCt1 Storage .EQU 20 ; handle of driver’s private storage 

DCt) RefNum »EGU 24 ; pefNum of this driver 

DCtl CurTicks «EGU 26 ; long counter for timing systemTask calls 

DCt1 Window EGU 30 } pointer to driver’s window (if any) 

OCti fel ay »EQU 34 : word for number of ticks between sysTask calls 
DCL EMask -ERU aé ; word for desk ornament event mask 

[Ct] Menu sEGU 38 word for menu associated with driver 


; Vertical Blanking Control Block Queue Element 


VBL INE »EGU Q 7 LINK TO NEXT ELEMENT 

VBLTYPE EGL 4 ; UNIQUE ID FOR VALIDITY CHECE 
VELADDR EOL é ; ADDRESS OF SERVICE ROUTINE 
VBLCOUNT »EQU io ; COUNT FIELD FOR TIMEOUT 
VBLFHASE EGU iz ; FHASE TO ALLOW SYNCHRONIZATION 
My 

INVBL »EGU é ; bit index for “in VBL" flag 


; Driver Format Definitions 


trveF 1 ags .EGU G } various fiags and permissions 

DrvrDel ay »£GU 2 : word indicating # of ticks between systask calls 
DrvrEMask EGU 4 ; word indicating what events to accept 

DrveHenu »EGU é ; word indicating driver menu ID 

DrvrOpen EGU g ; word offset to open routine 

DrvePrime »EGU id i word offset to prime routine 

DrveCtl +EGU iz ; word offset to control routine 

DrveStatus -EQU i4 : word offset to status routine 

Urvell ose »EQU 1é 3 word offset to warmstart reset routine 

DrveName »EGU 18 ; length byte and name of driver 


: Driver Flags Word Bit Field Definitions 


UReadEnable »EGU a) ; driver enabled for read operations 
DwritEnable »EGU 1 3 driver enabled for writing 

| BCtl Enable EGU 2 : driver enabled for control operations 
UStatEnabie .EGU a ; driver enabled for status operations 
UNeedGoodBye sEGU 4 ; driver needs a “goodbye kiss" 
UNeedTime .EGU sa ; driver needs “main thread" time 
UNeedLock »EGU & ; driver needs to be accessed at interrupt ievel 


; Run-Time Flags (in DCtiFlags+1) 


Dopened EU a ; flag to mark driver ‘Open’ 
DRANRased «EGU 4 ; i=RAMN-based Driver, G=ROM-based 
Drvractive «EGU 7 ; flag to mark the driver active 


; Desk Ornament Message [Detinitions 


accEvent EGU 64 ; feedEvent message 

accRun -EGU 65 ; SystemTask “run” message 
accCursor »EGU 66 ; cursor message for toptcst window 
acchenu »EQU a7 ; MENU message 

accCut eEOU éb ; cut message from system edit 
accCopy «EGU ba ; copy message from system edit 
accPaste EGU 70 ; paste message from system edit 
acclindo EGU 71 ; undo message from system edit 
acc] ear »ERU 72 ; clear message from system edit 


; General system equates: 
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1QGE1 Size »EGU a0 ; length of I/D parameter block 
TOLink »EQU - 0 ; queue link in header 

l0Type -EQU 4 ; type byte for safety check 
l0Trap »EGU 4 ; FS: the Trap 

TOCmdAddr +AU 5 } F5: address to dispatch to 


TOCompletion  .EQU i2 i; long pointer to completion routine 
TOResult »ERU ié ; 10 result code (=00 if sync call} 


lOFileName EGU i8 ; file name pointer 

T0VRetNum »EGU Ze ; volume retriuun 

100rvlum »EGU TOVRet Num ; tused for Eject and MountVol) 
lORef Num »EGQU 24 ; reference number for 1/0 operation 


lOFileType .EQU 26 } specified along with FileName (byte) 
TOPermssn EGU a? ; Open: permissions (byte) . 


iONewName »ERU 2g } Rename: new name pointer (4) 

LOLEOF »EGU Ze ; GetEOF SetEOF: logical end-of-file (4) 
TOOwnBut »EGU 28 ; Upen: optional ptr to locked S22-byte buffer 
TONewType 2EGU 26 ; SetFiletype: new type byte (1) 


TOBut ter »EGU a2 ; data buffer pointer 

iObyteCount EGU dé i requested byte count 

T0ReqCount »ERU a6 ; lequate used by file system Allocate) 
TGNumlone 2EGU 4g ; actual byte count completed 
TWaActCount  .ERU 4G ; (equate usad by file system Allocate) 


lOFostode »EGU 44 ; initial file positioning mode, ac} char 
iOPosOffset  .EQU 46 ; file position offset (long word) 
Nollueuebit 2EGU 9 ; tells [/0 system not to queue the request 
AsynTrpBit EGU ig ; bit in high byte of trap specifying async 


; @quates specitic to GetFileinfo,SetFileinto 


IOFGELSize EGU a0 File command parameter block byte jength 


ist 26 bytes are the same as the general block 


3 

bi 
iUFElirindex EGU 28 } GetFileinfo - directory index 
liFiactrib EGU 30 ; GetFileInfo ~ in-use bit=7, Jock bit=0 
IOFF i Type sEGU ai ; file type 
TOF] Usrws «EGU ae j Get, SetFilelnfa - user info (14 bytes) 
TUFF 1 Mum «EG 48 ; GetFileinfo - file number 


IOFI Stik EGU a2 
TOF 1 LgLen EGU a4 
TOFTFyLen »EGU a0 
TOFTRStBI k EGU be 
TOFTRigLen .EGU b4 
IOFTRPyLen = .EGU ae 


GetFileinfa - Start file block (0000 if none) 
File logical length (EOF) 

File physical length in bytes. 

Start file block, resource fork (0000 if none) 
File logical length (EOF), resource fork 

File physical lJength, resource fork 


on en me ee 


TOF i Crfiat »EGU Te } File creation date & time (32 bits in seconds) 
TOF i Mciat EMU 76 ; last modification date & time (32 bits in seconds) 


} aguates specific to GetVelinfo,GetVolume,SetVolume MountVol UnmountVol ,Eject 


TOVGElSize =. EBU 44 ; Volume command parameter block byte length 
TOVErvNum sEGU TOVRet hum ? ist 28 bytes are the same as the general block 
TOVNF Ee »EGU IOFileNane 

TOVol Index .EGU 28 : GetVol: volume index number 
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10VCrDate 
TOVESBkUp 
TOVAtrb 
TOVNmF 1s 
TOVDirst 
IOVBILn 
TOVAmAT Blis 
IOVATBIESiz 
IOVC  pSiz 
IOAiBISt 
TOVAN tFNum 
IOVFrBlk 


: 1/0 Command Equates 


ARdCnd 
AWeCnd 
ACt1 Cand 
AStsCmd 


} special 


C5Code 
CoFaran 


: System Event 


Nulievt 
MButDwnEvt 
MButupe vt 
KeyDwnEvt 
Reyupevt 
Autokeyevt 
UpdatEvt 


Disk InsertEyvt 


ActivateEvt 
AbortEvt 
Net WorkEvt 
ReserveEvt 
TGlevrevt 


Applevt 
AppZivet 
Appseyt 
Ape4evt 


EGU 
.EQU 
2EQU 
EBL 
»EGU 
»EQU 
EGU 
EGU 
» EGU 
-EGU 
»ESU 
EGU 


»EQU 
-EQU 
»EGU 
EGU 


offsets tor 


On fe Oa ba 


sE GL 26 
sEGU 28 

fefinitions 
«EGU o 
2b GU 1 
se z 
2EGU a 
«EQU 4 
»EDU 5 
eERU é 
«EGU 7 
»EGU g 
eEGU 7 
»E GU 1G 
2EGU id 
sEGU li 
2EGU iz 
«EDU i3 
»EGU 14 
»EQU if 


; Evant Record Definition 


EvtMax 
EvtbikSize 
EvEGE kSize 


EVtNua 
EviMessage 
EVtTIcks 
Evthouse 
Evtheta 
EviMbut 


; system device 


»EBU ao H 

»EGU ié 7 

2EGU EvtbikSizeté: 

»EGU i ; 

EGU 2 } longword 
eEGL & : longword 
»EGU 1G ; 

sEGU 14 : 

»EGU 15 ; 
constants 


the control 


ee ee ee ee a ere meer eee eer 


for 1/0 Gueue 


et ee ee ee 


‘an me 


GetVolinto: 
GetVolinfo: 
GetVolInto: 


starting diskette 


GetVolinfo: 
GetVol Info: 


Elements 


read command 


Thu, Mar 16, 1987 if:02 | PM i8 
GetVolinfo: creation date & time 
GetVolinfo: last backup date & time 
GetVolinfo: Volume attributes 
GetVolInfo: # files in directory 
GetVolinfo: start block of file dir 
GetVolinfo: length of dir in blocks 


mum blks (of alloc size} this dev 
alloc bik byte size 

bytes to try to allocate at a time 
(Si2-byte) block in block map 
next free file number 

word of # free alloc biks for this voi 


(match trap numbers} 


write command 


control 


command 


status command 


and status core routines 


a word for the control /status 
operation-def ined 


(Ae tn en A ee CM a See ee 


ve 


avent O is the null 
mouse button down 

mouse button up is event 2 
key down 
key up is event 4 
auto-repeated 
update event 


application 


maximum number of events 


word containing 


code 


parameters (20-bytes max) 


event 
is event i 


is event 3 


key is evant 43 


disk-inserted event 
activate/deactive event 
abort? 

network event 


reserved for system use 
driver-def ined 


event 


defined events 


in buffer 


size in bytes of the event record 
size of avent record counting queue info 


TD number of event 
containing event-defined ms¢ 
holding TICKS when event occured 


longword holding mouse pos when event occured 
byte containing 
byte indicating 


meta key flags 
state of mouse button 


3.19, Syqequ. Text 


Thu, Mar 


16, 


1789) = i1:02 PM 


iskRtN »EGL $FFFE ; disk’s reference number 

MouseCap »EGU & ; Mouse button keycap number 

; Control Call Codes 

VerifyCode .ERU a ; control call verify code 
FormatCode EGU 4 : control cali format cade 
EjectCode -ERU 7 ; control call eject code 

Kil Code EGU i 3; Rill1O) code 

; Status Call Codes 

frvStsCode EGU 8 : status call code for drive status 


ory 


Resource Manager Equates 


(Code optimization 
of BIST #ResSysket, 


High bits of the Locn Jong-werd--the 
used frequentiy 


RAttr (AZ). 


resource attributes: 
is a TST.B RAttr (AZ) 
This saves a lot of bytes 


instead 


awe ee wee ee 


in RMgri 


ResSyshet «EGU 7 ; reference to system/local reference 
Ressysheap EGU & ; In system/in application heap 
ResFurgeable 2EGU = ; Purgeable/not purgeable 
ResLocked »EGU 4 ; Locked/noat locked 

ResFrotectad .EGU 3 ; Protected/not protected 

RasPrel oad »EGU 2 ; Read in on openResource? 
ResChanged »EGU i ; Existing resource changed since last 
Reslser EGU iF ; User defined resource attribute. 
; When reading/writing, clear resChangad bit. 

RCBMask EGU $FU ; ResChanged, byte mask AND. 

; MAtte map attributes and masks 

MapReadinl y eEGU 7 3 is this file read-only? 
MapCompact EGU é i Is a compact necessary? 
MapChanged »ERU a ; Is it necessary to write man? 
MCCMask +EBU $40. _} MapCompact + MapChanged 

MChMask EGU #20 } MapChanged 

MCoMask EGU $40 ; MapCompact 

; ROC 

i; Hard Disk driver equates 

HUDrive »EGU 4 3; default drive # for hard disk 

HDR T Num eE GU $F FFE ; petnum for hard disk driver 

Hisk i EGU i j driver id 

InitCode EGU 30 i driver code for init controller 

Lisallisk EGU 99 } error code for Lisa disk attached 


; (REC) 


update 


1? 


